(standard-display-underline): Shift face id by 19 bits.

diff --git a/lisp/disp-table.el b/lisp/disp-table.el
index 01a1fce17debfce7526a78f4144af988e5669497..3ebc1c9e3801bd41b7b4b26a18c4e0a70803e3eb 100644 (file)
--- a/lisp/disp-table.el
+++ b/lisp/disp-table.el
@@ -161,7 +161,7 @@ X frame."
   (aset standard-display-table c
        (vector 
         (if window-system
-            (logior uc (lsh (face-id (internal-find-face 'underline)) 8))
+            (logior uc (lsh (face-id (internal-find-face 'underline)) 19))
           (create-glyph (concat "\e[4m" (char-to-string uc) "\e[m"))))))
 
 ;; Allocate a glyph code to display by sending STRING to the terminal.